-- background: 3627 from stack: in.1
-- bmap block id: 4328
-- flags: 0000
-- background id: 0
-- name: 


-- part 4 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=245 top=277 right=299 bottom=369
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Show Print Specs
----- HyperTalk script -----
on mouseUp
  if the visible of card field "print options" then
    set the name of the target to "Show Print Specs"
    hide card field "print options"
  else
    set the name of the target to "Hide Print Specs"
    hide card field "Layout"
    hide card field "Selection"
    show card field "print options"
    hide card field "about build"
  end if
end mouseUp



-- part 5 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=8 top=270 right=292 bottom=187
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: About PrFlds
----- HyperTalk script -----
on mouseUp
  hide card field "Layout"
  hide card field "Selection"
  hide card field "about build"
  show card field "About"
  if the optionKey is down then
    put the lockText of card field "About" into stats
    set the lockText of card field "About" to NOT stats
  end if
end mouseUp



-- part 6 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=8 top=293 right=315 bottom=187
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: PrFlds Parameter Layout
----- HyperTalk script -----
on mouseUp
  hide card field "Selection"
  set the scroll of card field "Layout" to 0
  show card field "Layout"
  hide card field "about build"
  if the optionKey is down then
    put the lockText of card field "Layout" into stats
    set the lockText of card field "Layout" to NOT stats
  end if
end mouseUp



-- part 7 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=8 top=316 right=338 bottom=186
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Special Selection Function
----- HyperTalk script -----
on mouseUp
  hide card field "Layout"
  set the scroll of card field "Selection" to 0
  show card field "Selection"
  hide card field "about build"
  if the optionKey is down then
    put the lockText of card field "Selection" into stats
    set the lockText of card field "Selection" to NOT stats
  end if
end mouseUp



-- part 8 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=246 top=301 right=323 bottom=367
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Build Print Specs
----- HyperTalk script -----
on mouseUp
  put "," into comma
  ask "The Background of which card?" with the number of cards
  if it is empty then exit mouseUp
  push card
  go to card it
  put empty into accum
  put the number of cards of this bkgnd into accum
  ask "Number of columns per page:" with 1
  if it is empty then exit mouseUp
  put comma & it after accum
  put the number of bkgnd fields into howMany
  put comma & howMany after accum
  ask "Gap between records:" with 8
  if it is empty then exit mouseUp
  put comma & it after accum
  ask "Top Margin (if different from gap):" with 30
  if it is NOT empty then
    put "/" & it after accum
  end if
  ask "Page Title:" with the short name of this Bkgnd
  if it is empty then exit mouseUp
  put comma & it after accum
  set cursor to 4
  repeat with ii = 1 to howMany
    put the ID of bkgnd field ii into aLine
    put comma & the rect of bkgnd field ii after aLine
    put comma & the textFont of bkgnd field ii after aLine
    put comma & the textSize of bkgnd field ii after aLine
    put comma & the textHeight of bkgnd field ii after aLine
    put comma & the textStyle of bkgnd field ii into thingg
    put comma after aLine
    put the number of items of thingg into hm
    if hm>0 then
      repeat with iii = 1 to hm
        put char 1 of item iii of thingg after aLine
      end repeat
    else
      put "P" after aLine
    end if
    put comma & the textAlign of bkgnd field ii after aLine
    put ",no," & the short name of bkgnd field ii after aLine
    put return & aLine after accum
  end repeat
  pop card
  put accum into card field "print options"
  set the name of bkgnd button ID 4 to "Hide Print Specs"
  show bkgnd button ID 4
  show card field "print options"
end mouseUp



-- part 10 (button)
-- low flags: 00
-- high flags: 8004
-- rect: left=280 top=327 right=342 bottom=384
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: about build
----- HyperTalk script -----
on mouseUp
  show card field "about build"
end mouseUp